home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / pc / macf / mger.dir / 00302.ls < prev    next >
Encoding:
Text File  |  1995-10-10  |  699 b   |  37 lines
  1. on mouseUp
  2.   global Clips, fullscreenG
  3.   put "inside 302"
  4.   put "fullscreenG", fullscreenG
  5.   if fullscreenG = 1 then
  6.     puppetSprite(48, 1)
  7.     set the visible of sprite 48 to 0
  8.     puppetSprite(48, 0)
  9.     setbarB()
  10.     ChangeScreenSize(Clips, "160,140", 1)
  11.     go("F2")
  12.     updateStage()
  13.     set fullscreenG to 0
  14.   end if
  15.   updateStage()
  16. end
  17.  
  18. on enterFrame
  19.   repeat with x = 3 to 7
  20.     if rollOver(x) = 1 then
  21.       puppetSprite(x, 1)
  22.       set the visible of sprite x to 1
  23.       puppetSprite(x, 0)
  24.     end if
  25.     if rollOver(x) = 0 then
  26.       puppetSprite(x, 1)
  27.       set the visible of sprite x to 0
  28.       puppetSprite(x, 0)
  29.     end if
  30.   end repeat
  31. end
  32.  
  33. on exitFrame
  34.   play done
  35.   go("160")
  36. end
  37.